CommonEvent 2526
Name = "Seduction: Elder Succubus"

  999([2151])
  Script(["$game_troop.lose_event_id = 3526"])
  ControlVariables([26, 26, 0, 3, 3, 1, 4])
  ControlVariables([26, 26, 4, 0, 10])
  ShowTextAttributes(["esuccubus_fc1", 2, 0, 2])
  ShowText(["\\n<Elder Succubus>You're surprisingly powerful. I'm going to be defeated if this keeps up. I'll have to resort to my specialty..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The Elder Succubus straddles on top of Luka!"])
  ShowTextAttributes(["esuccubus_fc1", 1, 0, 2])
  ShowText(["\\n<Elder Succubus>I'll rape you like this.\nYou'll get to experience the greatest of pleasures, so don't resist..."])
  ControlSwitches([98, 98, 0])
  ControlSwitches([96, 96, 0])
  ShowChoices([["Shake her off", "Accept"], 1])
  When([0, "振り払う"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Luka resists her temptation!"])
    CallCommonEvent([1999])
    ExitEventProcessing([])
    Empty([])

  When([1, "受け入れる"])
    Empty([])

  ChoicesEnd([])
  ShowTextAttributes(["esuccubus_fc1", 1, 0, 2])
  ShowText(["\\n<Elder Succubus>Well then, I'll be putting it in.\nI'll be taking your semen..."])
  ControlVariables([26, 26, 3, 0, 7])
  PlaySE(["RPG::SE(@name=\"mon_ero_pyu3\", @pitch=100, @volume=100)"])
  ShowPicture([5, "ev_esuccubus_h1", 0, 0, 0, 0, 100, 100, 255, 0])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The Elder Succubus slowly lowers her waist!\nLuka's penis was drawn into her warm vagina!\\D"])
  ShowText(["Luka takes \\V[26] damage!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  PlaySE(["RPG::SE(@name=\"mon_ero_chupa4\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The walls of her vagina squirm as it sucks on his penis!\nHer soft flesh contacts, melting Luka in enchanting pleasure!\\D"])
  ShowText(["Luka takes \\V[26] damage!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  Label(["射精1"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Hau, aaaaahhhh!!"])
  CallCommonEvent([104])
  ShowPicture([5, "ev_esuccubus_h2", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I succumb from the pleasure of the Elder Succubus' devilish vagina almost instantaneously, and offer up a large amount of my semen inside her..."])
  ShowTextAttributes(["esuccubus_fc1", 1, 0, 2])
  ShowText(["\\n<Elder Succubus>Fufu, that must have felt amazing...\nBut I'm not finished yet."])
  CallCommonEvent([2000])
  ExitEventProcessing([])
  Empty([])
